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“TITUS L BREE | OPCODE - Get opcode from debugger 
IDENT /1-001/ ; File: LIBGETOPC.MAR Edit: SBL1001 


SRAAAAAAAAEAEAAAETAEAAEAAAAAAAAAAAAAAAAAARAAAAAARAAAAAAAAAARAAAAAAAAAEEAAEAAAEEE 


COPYRIGHT (c) 1978, 1980, 1982, 1984 B 
DIGITAL EQUIPMENT eGORPORATION, © MAYNARD. MASSACHUSETTS. 
ALL RIGHTS RESERVE 


-* * 
i * 
*® ® 
*® ® 
: ® 
* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
is ONLY IN, ACCORDANCE WITH THE TERMS OF SUCH. LICENSE AND WITH THE 
+ INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER 
= COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY © 
:# OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS WHEREBY * 
@ TRANSFERRED. . 
: ® 
:® THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
ie NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
:*# CORPORATION. : 
° ® 
*® ® 
*® ® 
ef « 
ad ® 
® * 


DIGITAL ASSUMES NO RESPONS 
SOFTWARE ON EQUIPMENT WHIC 


ITY FOR THE USE OR RELIABILITY OF ITS 


IBIL 
H IS NOT SUPPLIED BY DIGITAL. 


: RHRAAAAKAATAAAEKAAAAATACAAAATAAAAAAAAAAARAARARAAAAARAAAAAARAAARAAAAAARAERAAAAEARAEAAERAEE 
“FACILITY: General Utility Library 
ABSTRACT: 


This module contains a procedure which asks the Conupger if 
a@ particular instruction has been modified by it 


ENVIRONMENT: Runs at any access mode, AST Reentrant 
AUTHOR: Steven B. Lionel, CREATION DATE: 04-Dec-1981 
MODIFIED BY: 

1-001 - Original. SBL 04-DEC-1981 


———— 
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apace from debugger 


* 
-SBTTL DECLARATIONS 
LIBRARY MACRO CALLS: 


SSSDEF 
SCHF DEF 


EXTERNAL DECLARATIONS: 
-DSABL GBL 
-EXTRN LIBSSIGNAL 
MACROS: 
NONE 
EQUATED SYMBOLS: 
NONE 
OWN STORAGE: 


NONE 
PSECT DECLARATIONS: 


-PSECT _LIBSCODE PIC, USR, CON, REL 
EXE, LON 


SEp-198e 9:07:51 Etienne.» 


; $S$ 


cro v04-00 
REIL LIBGETOPC .MAR; 1 


syanets 
: Condition handling facility symbols 


; Force all external symbols to be declared 


: Signal exception 


RD, NOWRT, 


Leas SHR, = 
NG 
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a .SBTTL LIBSGET_OPCODE 
: FUNCTIONAL DESCRIPTION: 


LIBSGET__OPCODE returns as its function value the opcode of 
an instruction wh gh may have been replaced by a de ugger. 
For example, VAX-11 DEBUG replaces instructions for which 
breakpoints have been set with BPT. It is designed to be 
used from condition handlers which understand instruction 
faults and which need to know the original contents of the 
instruction stream. 


LIBSGET_ OPCODE is called jnpl ters ty from LIBSDECODE__FAULT, 
IBSEMUCATE, LIBSFIXUP__FLT and LIBSSIM__TRAP. Therefore, 
t should only be used from fault handlers which do not 
employ LIBSDECODE__FAULT. 


LIBSGET__OPCODE determines the original opcode by + alae, 
the special exception ‘'SS$__DBGOPCREQ, de ugger opcode 
request’’. This success-severity exception is signalled with 
two FAO arguments: the first is the PC of the instruction 
for which the request is being made, the second is the 
address of a 16-bit word where the original instruction is 
to be placed. If the debugger is being used, it has a 
handler in the Or ieery exception vector. This handler 
recognizes SS$__DBGOPCREQ as a request for the original 

opco e for the indicated PC. If the debugger has changed 
the instruction at that PC, it stores the original opcode at 
the location given as the second FAO argument. If the 
debugger has modified only one byte of the instruction 
stream, it will = write one byte to the destination. The 
debugger's handler then returns SS$__CONTINUE, causing 
execution to continue after the signal. 


SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS 


SoOoSCooooooooooooooooooooo 


If no debugger is present, the error will be resignalled and 
will be intercepted by a handler inside LIBSGET__OPCODE, 
which will then return SS$__CONTINUE. LIBSGET_-OPCODE 
copies the instruction to the destination location before 

si mest i09 so that the original instruction is returned if 
not modified by the debugger. 


CALLING SEQUENCE: 
opcode.wwu.v = LIBSGET__OPCODE (instruction.rzi.r) 
FORMAL PARAMETERS: 


instruction = 4 3; The PC of the instruction 
3 which is to be inquired about. 
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So 
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00000004 


IMPLICIT INPUTS: 
NONE 
IMPLICIT OUTPUTS: 
NONE 
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-00 Pa 
LIBRIL.SRESLIBGETOPC.MAR:1 @°%° (4) 


Sot 
ROUTINE VALUE: 

The original instruction. 
SIDE EFFECTS: 

NONE 


” hb , 1eseer fp “M<> 
amt on(APS, RO 


(Sp 
SSU 
cove. (ROD, (SP) 
PUSHL 30 
PUSHL £355 DBGOPCRED, 
MOVAB ant *GLIBESIGNAL 


MOVL (36S, 4 


; Entry pe 

: b , s. Oe PC 

; Push instruction in stack 

$ gr byte opcode? 

; Skip_if not 

; Get 2-byte inotructie n 

; Push address e agyee instruction 
; Push instruct on P 

; Push ' ‘debugger poy request'’ message 
; Enable ss handl 

; signal § $S$_DBGO OPCRE Q 

: ginal’’ opcode in RO 


eed RP a a td dt tt a ts ts tt 
—D 


PUPP PP PLES 


NOUS WN O OONOUS WN OOONOU 


— 

So 

PP 

esesas 
m cor 3200 

wn ea 
Pr rTerererererererererere) 


; Return 2 caller 
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f 
LIBSGET_OPCODE LIBRTL.SRCIJLIBGETOPC.MAR; 1 (4) 
159 ;++ 

; 19 3; Local handler which does a SS$_CONTINUE if SS$_DBGOPCREQ seen. 
a i weauen: 

00g 8 184 «WORD 0 Save n ne 

50 A p 165 HOVZBL #SS$_CONTINUE, R ssune contin 
31 04 aC D0 166 OVL CHES. SIGARGLST CAP) , : Get nal eroune ats Li 
000006A1 8F | » ' 1 cRPL HFSL_SIG_NAME(R1), “ass eet 3; Is it SS _DBGOPCREQ? 
50 0918 $F 3¢ 3 1 $ noyeuL #SS$_RESIGNAL, RO : Resignal-al all other exceptions 

t7 ! 9 10$: RET ; Return to condition handling 
44 172 END ; End of module LIBSGET_OPCODE 
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ymbol Fable “SEP-1 LIBRTL.S REIL IBGETOPC.MAR; 1 
ek Yb ete s 4 
CHF SL_S1G_NAME = 
HANDLER BR 02 
TeScET OPCODE : OR 
L 18551 RAL eeeerere ‘ 88 
SS$_CONT INUE = 01 
$S$_DBGOPCREQ = 099 Al 
SS$_RESIGNAL = 18 

pe cwe nese seem cnenn 

; Psect synopsis * : 
PSECT name Allocation PSECT No. Attributes 
- ABS . 0000000c 8. 0.) NOPIC USR CON ABS LCL ee NOEXE NORD NOWRT NOVEC BYTE 
SABSS 00000000 ( 0.) oF NOPIC USR CON ABS LCL NOSHR' EXE RD WRT NOVEC BYTE 
_LIBSCODE 00000044 ( 6 2 ¢ 3°) PIC USR CON REL LCL SHR EXE RD NOWRT NOVEC LONG 

puaanwashonmmenenunnnnned 
i Per tornence indicators : 

Phase Page faults CPU Time Elapsed Time 
Initialization 29 0:00: 8.9% 00:00:01.79 
zounend processing i B8'20: 9-36 OF 80394 “ca 
Synbol table sort A 00:00: 0:42 08:99:98-73 
Syabot table output 3 0:00:00-03 0:00;00-09 
Psect synopsis output 0:00:00.01 00:00:00.01 
Cross-reference output 8:88:08 - 30 Bo +8299 80 
Assembler run totals 38 00:00:03.9 00:00:19.9 


e working ees Limit was 900 pages. 

sTT40 bytes (42 pages) of virtual memory were used to buffer the intermediate code. 

There were 30 pages of symbol table space ol iocas d to hold 424 non-local and 2 local symbols. 
source Lines were read in Pass 1, produci ng object records in Pass 2. 

9 pages of virtual memory were used to define 8 macros. 


weer eee seen meee mm eroncea = $ 


Macro Library name Macros defined 
~$255SDUA28: (SYSLIBISTARLET.MLB; 2 REI 
486 GETS were required to define 5 macros. 

There were no errors, warnings or information messages. 
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